home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 4 / developer source - volume 4.iso / parad / jul94 / srfig15b.gif < prev    next >
Graphics Interchange Format  |  1996-07-02  |  21.6 KB  |  517x363  |  4-bit (14 colors)
   ocr: SOLIVIEW:SpDependsbutton:pushButton" method pushButton(uar eventinto Event) var Sqistring string anstbl string enduar if isAssigned(Tableselected) and Tableselected <> : then anstbl = EPRIU:Sdepends" if strdbtype = "SYBASE" then Sq1String = "sp_ depends " : Tablelist.1alue + : executesqLTable(Sq1String,strdbnane, - lmisPasswerd,anstbl) else tbl.attach(":"*strdbnane*"""*Tableselected) tDl.enumserintstruct(anstDl) endif if tv.open(anstDl,WinstyleDerault,100,100,5500,4000) then Setlablevieenttrimutes0 tw.settitle(-Depends for Table: : - TablpSelected) tu.wait() tu.close() endif endif endMethod Ed ...